Jak ziskat seznam existujicich aliasu

Otázka od: Jaroslav Kohák

17. 9. 2002 8:56

Ahoj,
potreboval bych pri startu aplikace dat uzivateli navyber z existujicich
aliasu, na ktery se pripoji.
Nedelali jste to nahodou ?
 
Diky Tymi

Odpovedá: Jan Sebelík

17. 9. 2002 16:23

Odesílatel: Jaroslav Kohák <jaroslav.kohak@dites.cz>
potreboval bych pri startu aplikace dat uzivateli navyber z existujicich
aliasu, na ktery se pripoji.

Session.GetAliasNames

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes.cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Odpovedá: Jiri Foldyna

17. 9. 2002 16:19

Ahoj,

pouzil jsem tohle:

procedure GetAliasList(const Items : TStrings);
var
  s : string;
begin
  Items.Clear;
  with TBDEItems.Create(Application) do
  try
    ItemType := bdDatabases;
    Open;
    while not EOF do
    begin
      Items.Add(FieldByName('NAME').AsString);
      Next;
    end;
  finally
    Free;
  end;
end;

Zdravim

Jiri Foldyna
mailto:jiri.f@avizo.cz

Odpovedá: Roman Konecnz

17. 9. 2002 15:58

Nejdrive musis mit v Uses unitu DB;

Pak staci
  Session.GetAliasNames(ListBox1.Items); //nebo jina komponenta, jejiz items je
TStrings

Roman
  From: Jaroslav Kohák
  To: Delphi fórum (el. adresa)
  Sent: Tuesday, September 17, 2002 8:53 AM
  Subject: Jak ziskat seznam existujicich aliasu


  Ahoj,
  potreboval bych pri startu aplikace dat uzivateli navyber z existujicich
aliasu, na ktery se pripoji.
  Nedelali jste to nahodou ?

  Diky Tymi

Odpovedá: Jaroslav Kohák

17. 9. 2002 15:46

Tak uz jsem to zjistil.
Vsem díky za snahu a jestli se to nekomu hodí tak takhle date treba do
FormCreate a v CB si pak muzete vybirat alias:
 
Session->GetAliasNames(nejakyComboBox->Items);
 
-----Original Message-----
From: Jaroslav Kohák
Sent: Tuesday, September 17, 2002 8:54 AM
To: Delphi fórum (el. adresa)
Subject: Jak ziskat seznam existujicich aliasu


Ahoj,
potreboval bych pri startu aplikace dat uzivateli navyber z existujicich
aliasu, na ktery se pripoji.
Nedelali jste to nahodou ?
 
Diky Tymi

Odpovedá: Jan Sebelík

18. 9. 2002 8:35

Odesílatel: Roman Konecnz <rkonecny@datis.cz>
Nejdrive musis mit v Uses unitu DB;

Unitu DBTables - tam je BDE, obecna unita DB je pod vsemi typy databazovych
pripojeni a BDE tedy nezna.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes.cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================